home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung 2 / Power-Programmierung CD 2 (Tewi)(1994).iso / c / library / mslang / vm / src / xms / xms08.asm < prev    next >
Encoding:
Assembly Source File  |  1993-12-13  |  483 b   |  31 lines
  1.     .model    large,pascal
  2.  
  3.     include xms.inc
  4.  
  5.     .code    XMS_TEXT
  6.  
  7.     ;ERR PUBLIC __ErrXmsQueryFreeExtMemory(PUSHORT pckbLargestFree, PUSHORT pckbTotalFree);
  8.  
  9.     public    __ErrXmsQueryFreeExtMemory
  10. __ErrXmsQueryFreeExtMemory    proc    \
  11.     pckbLargestFree:ptr word,    \
  12.     pckbTotalFree:ptr word
  13.  
  14.     XmsCall 08h
  15.     jc    Exit        ;Brif error
  16.  
  17.     les    bx,[pckbLargestFree]
  18.     mov    es:[bx],ax
  19.  
  20.     les    bx,[pckbTotalFree]
  21.     mov    es:[bx],dx
  22.  
  23.     xor    ax,ax
  24.  
  25. Exit:
  26.     ret
  27.  
  28. __ErrXmsQueryFreeExtMemory    endp
  29.  
  30.     end
  31.